home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. Windows 3
/
dr win3.zip
/
dr win3
/
WINPROGS
/
UPC12BS2.ZIP
/
TEST
/
TESTSCRT.C
< prev
next >
Wrap
C/C++ Source or Header
|
1992-11-22
|
5KB
|
145 lines
/*--------------------------------------------------------------------*/
/* s c r t e s t */
/* */
/* login Script test driver for UUPC/extended */
/* */
/* Copyright (c) Andrew H. Derbyshire */
/* */
/* May be distributed freely if original source and */
/* documentation files are included. Please direct all */
/* questions on UUPC/extended to help@kew.com. */
/*--------------------------------------------------------------------*/
/*--------------------------------------------------------------------*/
/* You know it's a REAL bitch if I write a test driver for it. */
/*--------------------------------------------------------------------*/
/*--------------------------------------------------------------------*/
/* System include files */
/*--------------------------------------------------------------------*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <stdarg.h>
#include <assert.h>
#include <conio.h>
/*--------------------------------------------------------------------*/
/* UUPC/extended included files */
/*--------------------------------------------------------------------*/
#include "lib.h"
#include "hlib.h"
#include "script.h"
void slowwrite( char *s, int len);
/*--------------------------------------------------------------------*/
/* m a i n */
/* */
/* Main program for driver */
/*--------------------------------------------------------------------*/
void main( int argc, char **argv)
{
int result;
char **failure = NULL;
assert( argc > 1 );
if (argc > 2)
failure = &argv[2];
result = expectstr( argv[1], 30, failure );
printf("Result of operation is %d",result);
exit(0);
} /* main */
/*--------------------------------------------------------------------*/
/* Replacement for UUPC/extended logging function */
/*--------------------------------------------------------------------*/
#pragma argsused
void printmsg(int level, char *fmt, ...)
{
va_list arg_ptr;
va_start(arg_ptr,fmt);
vfprintf(stdout, fmt, arg_ptr);
putchar('\n');
}
void bugout( const size_t lineno, const char *fname )
{
printmsg(0,"Program aborting at line %d in file %s",
lineno, fname );
fcloseall();
exit(69);
} /*bugout */
/*--------------------------------------------------------------------*/
/* s r e a d */
/* */
/* Fake serial port read */
/*--------------------------------------------------------------------*/
extern unsigned int sread(char *buffer,
unsigned int wanted,
unsigned int timeout)
{
int c;
int needed = wanted;
printf("sread(%d,%d):",wanted,timeout);
while(needed-- > 0)
{
c = getch();
if ( c == '.' )
return -1;
else
*buffer++ = c;
}
putchar('\n');
return wanted;
}
int swrite(char *data, unsigned int len)
{
int needed = len;
printf("swrite:");
while ( needed-- )
putchar( *data++ );
putchar('\n');
return len;
}
void ssendbrk(unsigned int duration)
{
printf("BREAK %d\n",duration);
}
/*--------------------------------------------------------------------*/
/* s l o w w r i t e */
/* */
/* Write characters to the serial port at a configurable */
/* snail's pace. */
/*--------------------------------------------------------------------*/
void slowwrite( char *s, int len)
{
swrite( s , len );
} /* slowwrite */
#pragma argsused
void SIOSpeed(BPS bps)
{
printf("SIOSPEED\n");
} /*SIOSpeed*/